f[x_] := (x^x);

Plot[{f[x],f'[x]},{x, 0.0001, 3.},GridLines -> Automatic,AxesOrigin -> {0.0, 0.0},PlotRange -> {{0, 3}, {-1, 6}},AspectRatio -> 0.8,PlotStyle -> {{RGBColor[1, 0, 0]}, {RGBColor[0, 0, 1]}}]